home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmstanc / _setup.1 / AHMTExplorerView.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-05  |  3.8 KB  |  116 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTExplorerView.pas' rev: 3.00
  6.  
  7. #ifndef AHMTExplorerViewHPP
  8. #define AHMTExplorerViewHPP
  9. #include <AHMSControls.hpp>
  10. #include <Registry.hpp>
  11. #include <Menus.hpp>
  12. #include <StdCtrls.hpp>
  13. #include <Dialogs.hpp>
  14. #include <Forms.hpp>
  15. #include <Controls.hpp>
  16. #include <Graphics.hpp>
  17. #include <Classes.hpp>
  18. #include <Messages.hpp>
  19. #include <Windows.hpp>
  20. #include <SysUtils.hpp>
  21. #include <SysInit.hpp>
  22. #include <System.hpp>
  23.  
  24. //-- user supplied -----------------------------------------------------------
  25.  
  26. namespace Ahmtexplorerview
  27. {
  28. //-- type declarations -------------------------------------------------------
  29. class DELPHICLASS TAHMExplorerView;
  30. class PASCALIMPLEMENTATION TAHMExplorerView : public Stdctrls::TCustomListBox 
  31. {
  32.     typedef Stdctrls::TCustomListBox inherited;
  33.     
  34. private:
  35.     System::AnsiString FFileName;
  36.     System::AnsiString FDirectory;
  37.     Graphics::TBitmap* FBitmap;
  38.     Classes::TNotifyEvent FOnSelectFile;
  39.     Classes::TNotifyEvent FOnSelectDirectory;
  40.     System::AnsiString FFilter;
  41.     TEditCharCase FCharCase;
  42.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  43.     void __fastcall SetDirectory(System::AnsiString Value);
  44.     void __fastcall SetCharCase(Stdctrls::TEditCharCase ACase);
  45.     
  46. protected:
  47.     virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Stdctrls::TOwnerDrawState State
  48.         );
  49.     DYNAMIC void __fastcall Click(void);
  50.     DYNAMIC void __fastcall DblClick(void);
  51.     DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  52.     virtual void __fastcall CreateWnd(void);
  53.     virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  54.     
  55. public:
  56.     __fastcall virtual TAHMExplorerView(Classes::TComponent* AOwner);
  57.     virtual void __fastcall Loaded(void);
  58.     __fastcall virtual ~TAHMExplorerView(void);
  59.     virtual void __fastcall Update(void);
  60.     virtual void __fastcall RePaint(void);
  61.     Word __fastcall RPos(const char SubStr, System::AnsiString Str);
  62.     
  63. __published:
  64.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  65.     __property System::AnsiString Directory = {read=FDirectory, write=SetDirectory};
  66.     __property System::AnsiString FileName = {read=FFileName};
  67.     __property System::AnsiString Filter = {read=FFilter, write=FFilter};
  68.     __property Stdctrls::TEditCharCase CharCase = {read=FCharCase, write=SetCharCase, nodefault};
  69.     __property Align ;
  70.     __property BorderStyle ;
  71.     __property Columns ;
  72.     __property Ctl3D ;
  73.     __property DragCursor ;
  74.     __property DragMode ;
  75.     __property Enabled ;
  76.     __property Font ;
  77.     __property IntegralHeight ;
  78.     __property ItemHeight ;
  79.     __property ParentColor ;
  80.     __property ParentCtl3D ;
  81.     __property ParentFont ;
  82.     __property ParentShowHint ;
  83.     __property PopupMenu ;
  84.     __property ShowHint ;
  85.     __property TabOrder ;
  86.     __property TabStop ;
  87.     __property Visible ;
  88.     __property OnDragDrop ;
  89.     __property OnDragOver ;
  90.     __property OnDrawItem ;
  91.     __property OnEndDrag ;
  92.     __property OnEnter ;
  93.     __property OnExit ;
  94.     __property OnMeasureItem ;
  95.     __property OnMouseDown ;
  96.     __property OnMouseMove ;
  97.     __property OnMouseUp ;
  98.     __property OnDblClick ;
  99.     __property Classes::TNotifyEvent OnSelectFile = {read=FOnSelectFile, write=FOnSelectFile};
  100.     __property Classes::TNotifyEvent OnSelectDirectory = {read=FOnSelectDirectory, write=FOnSelectDirectory
  101.         };
  102. public:
  103.     /* TWinControl.CreateParented */ __fastcall TAHMExplorerView(HWND ParentWindow) : Stdctrls::TCustomListBox(
  104.         ParentWindow) { }
  105.     
  106. };
  107.  
  108. //-- var, const, procedure ---------------------------------------------------
  109.  
  110. }    /* namespace Ahmtexplorerview */
  111. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  112. using namespace Ahmtexplorerview;
  113. #endif
  114. //-- end unit ----------------------------------------------------------------
  115. #endif    // AHMTExplorerView
  116.